#lang racket

(require "deque.rkt")

(define d (make-deque))

(print-deque d)

(empty-deque? d)

(front-insert-deque! d 'a)

(rear-insert-deque! d 'x)

(print-deque d)

(front-insert-deque! d 'b)

(rear-insert-deque! d 'y)

(print-deque d)

(front-delete-deque! d)

(rear-delete-deque! d)

(front-delete-deque! d)

(rear-delete-deque! d)

(print-deque d)

(front-insert-deque! d 'c)

(front-delete-deque! d)

(print-deque d)



